/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.006 / xemacs-1 / lib / xemacs-19.13 / lisp / vm / vm-save.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 34 3a 33 30 3a 34 | 37 20 31 39 39 35 0a 3b | 14:30:4|7 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 65 78 |;; from |file /ex|
|00000060| 70 6f 72 74 2f 77 69 6c | 6c 6f 77 33 2f 78 65 6d |port/wil|low3/xem|
|00000070| 61 63 73 2d 31 39 2e 31 | 33 2d 72 65 6c 65 61 73 |acs-19.1|3-releas|
|00000080| 65 2f 65 64 69 74 6f 72 | 2f 6c 69 73 70 2f 76 6d |e/editor|/lisp/vm|
|00000090| 2f 76 6d 2d 73 61 76 65 | 2e 65 6c 0a 3b 3b 3b 20 |/vm-save|.el.;;; |
|000000a0| 65 6d 61 63 73 20 76 65 | 72 73 69 6f 6e 20 31 39 |emacs ve|rsion 19|
|000000b0| 2e 31 33 20 58 45 6d 61 | 63 73 20 4c 75 63 69 64 |.13 XEma|cs Lucid|
|000000c0| 2e 0a 3b 3b 3b 20 62 79 | 74 65 63 6f 6d 70 20 76 |..;;; by|tecomp v|
|000000d0| 65 72 73 69 6f 6e 20 32 | 2e 32 35 3b 20 31 2d 53 |ersion 2|.25; 1-S|
|000000e0| 65 70 2d 39 34 2e 0a 3b | 3b 3b 20 6f 70 74 69 6d |ep-94..;|;; optim|
|000000f0| 69 7a 61 74 69 6f 6e 20 | 69 73 20 6f 6e 2e 0a 3b |ization |is on..;|
|00000100| 3b 3b 20 74 68 69 73 20 | 66 69 6c 65 20 75 73 65 |;; this |file use|
|00000110| 73 20 6f 70 63 6f 64 65 | 73 20 77 68 69 63 68 20 |s opcode|s which |
|00000120| 64 6f 20 6e 6f 74 20 65 | 78 69 73 74 20 69 6e 20 |do not e|xist in |
|00000130| 45 6d 61 63 73 20 31 38 | 2e 0a 0a 28 69 66 20 28 |Emacs 18|...(if (|
|00000140| 61 6e 64 20 28 62 6f 75 | 6e 64 70 20 27 65 6d 61 |and (bou|ndp 'ema|
|00000150| 63 73 2d 76 65 72 73 69 | 6f 6e 29 0a 09 20 28 6f |cs-versi|on).. (o|
|00000160| 72 20 28 61 6e 64 20 28 | 62 6f 75 6e 64 70 20 27 |r (and (|boundp '|
|00000170| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 20 |epoch::v|ersion) |
|00000180| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 0a |epoch::v|ersion).|
|00000190| 09 20 20 20 20 20 28 73 | 74 72 69 6e 67 2d 6c 65 |.     (s|tring-le|
|000001a0| 73 73 70 20 65 6d 61 63 | 73 2d 76 65 72 73 69 6f |ssp emac|s-versio|
|000001b0| 6e 20 22 31 39 22 29 29 | 29 0a 20 20 20 20 28 65 |n "19"))|).    (e|
|000001c0| 72 72 6f 72 20 22 54 68 | 69 73 20 66 69 6c 65 20 |rror "Th|is file |
|000001d0| 77 61 73 20 63 6f 6d 70 | 69 6c 65 64 20 66 6f 72 |was comp|iled for|
|000001e0| 20 45 6d 61 63 73 20 31 | 39 2e 22 29 29 0a 0a 28 | Emacs 1|9."))..(|
|000001f0| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 c1 21 88 c2 |byte-cod|e "..!..|
|00000200| c3 4d 88 c4 c5 4d 87 22 | 20 5b 70 72 6f 76 69 64 |.M...M."| [provid|
|00000210| 65 20 76 6d 2d 73 61 76 | 65 20 76 6d 2d 6d 61 74 |e vm-sav|e vm-mat|
|00000220| 63 68 2d 64 61 74 61 20 | 23 5b 6e 69 6c 20 22 c0 |ch-data |#[nil ".|
|00000230| c1 1a 89 1b ab 90 0b 40 | 94 0b 40 95 5c 6e 42 42 |.......@|..@.\nBB|
|00000240| 12 0b 41 89 13 ac 70 5c | 6e 2a 87 22 20 5b 28 39 |..A...p\|n*." [(9|
|00000250| 20 38 20 37 20 36 20 35 | 20 34 20 33 20 32 20 31 | 8 7 6 5| 4 3 2 1|
|00000260| 20 30 29 20 6e 69 6c 20 | 6c 69 73 74 20 69 6e 64 | 0) nil |list ind|
|00000270| 65 78 5d 20 34 5d 20 76 | 6d 2d 61 75 74 6f 2d 73 |ex] 4] v|m-auto-s|
|00000280| 65 6c 65 63 74 2d 66 6f | 6c 64 65 72 20 23 5b 28 |elect-fo|lder #[(|
|00000290| 6d 70 20 61 75 74 6f 2d | 66 6f 6c 64 65 72 2d 61 |mp auto-|folder-a|
|000002a0| 6c 69 73 74 29 20 22 c0 | c1 c2 8f 87 22 20 5b 65 |list) ".|...." [e|
|000002b0| 72 72 6f 72 2d 64 61 74 | 61 20 28 62 79 74 65 2d |rror-dat|a (byte-|
|000002c0| 63 6f 64 65 20 22 c0 c1 | 8d 87 22 20 5b 6d 61 74 |code "..|.." [mat|
|000002d0| 63 68 20 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |ch (byte|-code ".|
|000002e0| 89 89 19 1a 1b 0c 89 12 | 83 8c 00 c5 0e 06 40 5c |........|......@\|
|000002f0| 6e 40 40 5c 22 89 13 ab | ee 5c 6e 40 41 89 11 ab |n@@\"...|.\n@A...|
|00000300| e7 0e 07 1e 08 c9 09 40 | 40 0b 5c 22 29 ab d4 09 |.......@|@.\")...|
|00000310| 40 41 3a ac 89 ca cb 09 | 40 41 5c 22 88 aa c5 cc |@A:.....|@A\"....|
|00000320| 20 1e 0d ce cf 21 1e 10 | c0 1e 11 8a 0e 10 71 88 | ....!..|......q.|
|00000330| 7e 88 d2 20 88 0b 63 88 | d3 d4 d5 d4 d6 0e 0d 5c |~.. ..c.|.......\|
|00000340| 22 5c 22 21 88 d7 09 40 | 41 21 89 16 11 3a ab 8b |"\"!...@|A!...:..|
|00000350| d8 0e 06 0e 11 5c 22 89 | 16 11 aa 72 0e 11 ab 86 |.....\".|...r....|
|00000360| ca cb 0e 11 5c 22 88 2c | 09 41 89 11 ac 19 5c 6e |....\".,|.A....\n|
|00000370| 41 89 12 ac 00 2b c0 87 | 22 20 5b 6e 69 6c 20 74 |A....+..|" [nil t|
|00000380| 75 70 6c 65 2d 6c 69 73 | 74 20 61 6c 69 73 74 20 |uple-lis|t alist |
|00000390| 68 65 61 64 65 72 20 61 | 75 74 6f 2d 66 6f 6c 64 |header a|uto-fold|
|000003a0| 65 72 2d 61 6c 69 73 74 | 20 76 6d 2d 67 65 74 2d |er-alist| vm-get-|
|000003b0| 68 65 61 64 65 72 2d 63 | 6f 6e 74 65 6e 74 73 20 |header-c|ontents |
|000003c0| 6d 70 20 76 6d 2d 61 75 | 74 6f 2d 66 6f 6c 64 65 |mp vm-au|to-folde|
|000003d0| 72 2d 63 61 73 65 2d 66 | 6f 6c 64 2d 73 65 61 72 |r-case-f|old-sear|
|000003e0| 63 68 20 63 61 73 65 2d | 66 6f 6c 64 2d 73 65 61 |ch case-|fold-sea|
|000003f0| 72 63 68 20 73 74 72 69 | 6e 67 2d 6d 61 74 63 68 |rch stri|ng-match|
|00000400| 20 74 68 72 6f 77 20 6d | 61 74 63 68 20 76 6d 2d | throw m|atch vm-|
|00000410| 6d 61 74 63 68 2d 64 61 | 74 61 20 6d 61 74 63 68 |match-da|ta match|
|00000420| 2d 64 61 74 61 20 67 65 | 74 2d 62 75 66 66 65 72 |-data ge|t-buffer|
|00000430| 2d 63 72 65 61 74 65 20 | 22 20 2a 76 6d 2d 61 75 |-create |" *vm-au|
|00000440| 74 6f 2d 66 6f 6c 64 65 | 72 2a 22 20 62 75 66 20 |to-folde|r*" buf |
|00000450| 72 65 73 75 6c 74 20 65 | 72 61 73 65 2d 62 75 66 |result e|rase-buf|
|00000460| 66 65 72 20 73 74 6f 72 | 65 2d 6d 61 74 63 68 2d |fer stor|e-match-|
|00000470| 64 61 74 61 20 6d 61 70 | 63 61 72 20 23 5b 28 6e |data map|car #[(n|
|00000480| 29 20 22 08 ad 85 c1 20 | 08 c2 93 87 22 20 5b 6e |) ".... |...." [n|
|00000490| 20 6d 61 6b 65 2d 6d 61 | 72 6b 65 72 20 6e 69 6c | make-ma|rker nil|
|000004a0| 5d 20 33 5d 20 23 5b 28 | 6e 29 20 22 08 ad 82 08 |] 3] #[(|n) "....|
|000004b0| 54 87 22 20 5b 6e 5d 20 | 31 5d 20 65 76 61 6c 20 |T." [n] |1] eval |
|000004c0| 76 6d 2d 61 75 74 6f 2d | 73 65 6c 65 63 74 2d 66 |vm-auto-|select-f|
|000004d0| 6f 6c 64 65 72 5d 20 37 | 29 5d 20 32 29 20 28 28 |older] 7|)] 2) ((|
|000004e0| 65 72 72 6f 72 20 28 62 | 79 74 65 2d 63 6f 64 65 |error (b|yte-code|
|000004f0| 20 22 c0 c1 c2 0b 21 5c | 22 87 22 20 5b 65 72 72 | "....!\|"." [err|
|00000500| 6f 72 20 22 65 72 72 6f | 72 20 70 72 6f 63 65 73 |or "erro|r proces|
|00000510| 73 69 6e 67 20 76 6d 2d | 61 75 74 6f 2d 66 6f 6c |sing vm-|auto-fol|
|00000520| 64 65 72 2d 61 6c 69 73 | 74 3a 20 25 73 22 20 70 |der-alis|t: %s" p|
|00000530| 72 69 6e 31 2d 74 6f 2d | 73 74 72 69 6e 67 20 65 |rin1-to-|string e|
|00000540| 72 72 6f 72 2d 64 61 74 | 61 5d 20 34 29 29 29 5d |rror-dat|a] 4)))]|
|00000550| 20 33 5d 5d 20 32 29 0a | 28 66 73 65 74 20 27 76 | 3]] 2).|(fset 'v|
|00000560| 6d 2d 61 75 74 6f 2d 61 | 72 63 68 69 76 65 2d 6d |m-auto-a|rchive-m|
|00000570| 65 73 73 61 67 65 73 20 | 23 5b 28 26 6f 70 74 69 |essages |#[(&opti|
|00000580| 6f 6e 61 6c 20 61 72 67 | 29 20 22 08 ab 8d c1 08 |onal arg|) ".....|
|00000590| 21 ac 85 c2 c3 21 ab 83 | 08 71 88 c4 20 88 c5 20 |!....!..|.q.. .. |
|000005a0| 88 c6 c7 21 88 c8 c9 1e | 5c 6e 1e 0b cc 8e 0e 0d |...!....|\n......|
|000005b0| ce 3d ab 85 cf c9 21 aa | 82 0e 10 c8 89 0e 11 c8 |.=....!.|........|
|000005c0| 1e 12 1e 11 1e 13 1e 14 | 1e 15 d6 0e 15 21 16 13 |........|.....!..|
|000005d0| 0e 14 ac da 0e 15 40 d7 | 48 d8 48 ac c3 0e 15 40 |......@.|H.H....@|
|000005e0| d7 48 d7 48 ac ba d9 0e | 15 0e 1a 5c 22 89 16 0b |.H.H....|...\"...|
|000005f0| ab af 0e 1b ab 90 dc dd | de 0e 15 40 df 48 c9 48 |........|...@.H.H|
|00000600| 0e 0b 23 21 ab 9b 0e 20 | 1e 21 0e 0b e2 98 ac 85 |..#!... |.!......|
|00000610| e3 0e 0b 21 88 0e 5c 6e | 54 16 5c 6e c6 e4 0e 5c |...!..\n|T.\n...\|
|00000620| 6e 5c 22 88 29 0e 15 0e | 13 3d 16 14 0e 15 41 16 |n\".)...|.=....A.|
|00000630| 15 aa 5c 22 2e 06 0e 5c | 6e c9 55 ab 85 e5 e6 21 |..\"...\|n.U....!|
|00000640| aa 8e e5 e7 0e 5c 6e 89 | df 55 ab 83 e8 aa 81 e9 |.....\n.|.U......|
|00000650| 23 2a 87 22 20 5b 76 6d | 2d 6d 61 69 6c 2d 62 75 |#*." [vm|-mail-bu|
|00000660| 66 66 65 72 20 62 75 66 | 66 65 72 2d 6e 61 6d 65 |ffer buf|fer-name|
|00000670| 20 65 72 72 6f 72 20 22 | 46 6f 6c 64 65 72 20 62 | error "|Folder b|
|00000680| 75 66 66 65 72 20 68 61 | 73 20 62 65 65 6e 20 6b |uffer ha|s been k|
|00000690| 69 6c 6c 65 64 2e 22 20 | 76 6d 2d 63 68 65 63 6b |illed." |vm-check|
|000006a0| 2d 66 6f 72 2d 6b 69 6c | 6c 65 64 2d 73 75 6d 6d |-for-kil|led-summ|
|000006b0| 61 72 79 20 76 6d 2d 65 | 72 72 6f 72 2d 69 66 2d |ary vm-e|rror-if-|
|000006c0| 66 6f 6c 64 65 72 2d 65 | 6d 70 74 79 20 76 6d 2d |folder-e|mpty vm-|
|000006d0| 75 6e 73 61 76 65 64 2d | 6d 65 73 73 61 67 65 20 |unsaved-|message |
|000006e0| 22 41 72 63 68 69 76 69 | 6e 67 2e 2e 2e 22 20 6e |"Archivi|ng..." n|
|000006f0| 69 6c 20 30 20 61 72 63 | 68 69 76 65 64 20 61 75 |il 0 arc|hived au|
|00000700| 74 6f 2d 66 6f 6c 64 65 | 72 20 28 28 62 79 74 65 |to-folde|r ((byte|
|00000710| 2d 63 6f 64 65 20 22 c0 | c1 20 5c 6e 5c 22 88 c3 |-code ".|. \n\"..|
|00000720| 20 87 22 20 5b 69 6e 74 | 65 72 6e 20 62 75 66 66 | ." [int|ern buff|
|00000730| 65 72 2d 6e 61 6d 65 20 | 76 6d 2d 62 75 66 66 65 |er-name |vm-buffe|
|00000740| 72 73 2d 6e 65 65 64 69 | 6e 67 2d 64 69 73 70 6c |rs-needi|ng-displ|
|00000750| 61 79 2d 75 70 64 61 74 | 65 20 76 6d 2d 75 70 64 |ay-updat|e vm-upd|
|00000760| 61 74 65 2d 73 75 6d 6d | 61 72 79 2d 61 6e 64 2d |ate-summ|ary-and-|
|00000770| 6d 6f 64 65 2d 6c 69 6e | 65 5d 20 33 29 29 20 6c |mode-lin|e] 3)) l|
|00000780| 61 73 74 2d 63 6f 6d 6d | 61 6e 64 20 76 6d 2d 6e |ast-comm|and vm-n|
|00000790| 65 78 74 2d 63 6f 6d 6d | 61 6e 64 2d 75 73 65 73 |ext-comm|and-uses|
|000007a0| 2d 6d 61 72 6b 73 20 76 | 6d 2d 73 65 6c 65 63 74 |-marks v|m-select|
|000007b0| 2d 6d 61 72 6b 65 64 2d | 6f 72 2d 70 72 65 66 69 |-marked-|or-prefi|
|000007c0| 78 65 64 2d 6d 65 73 73 | 61 67 65 73 20 76 6d 2d |xed-mess|ages vm-|
|000007d0| 6d 65 73 73 61 67 65 2d | 6c 69 73 74 20 76 6d 2d |message-|list vm-|
|000007e0| 6c 61 73 74 2d 73 61 76 | 65 2d 66 6f 6c 64 65 72 |last-sav|e-folder|
|000007f0| 20 76 6d 2d 6d 6f 76 65 | 2d 61 66 74 65 72 2d 64 | vm-move|-after-d|
|00000800| 65 6c 65 74 69 6e 67 20 | 73 74 6f 70 2d 70 6f 69 |eleting |stop-poi|
|00000810| 6e 74 20 64 6f 6e 65 20 | 76 6d 2d 6d 65 73 73 61 |nt done |vm-messa|
|00000820| 67 65 2d 70 6f 69 6e 74 | 65 72 20 76 6d 2d 6c 61 |ge-point|er vm-la|
|00000830| 73 74 20 32 20 33 20 76 | 6d 2d 61 75 74 6f 2d 73 |st 2 3 v|m-auto-s|
|00000840| 65 6c 65 63 74 2d 66 6f | 6c 64 65 72 20 76 6d 2d |elect-fo|lder vm-|
|00000850| 61 75 74 6f 2d 66 6f 6c | 64 65 72 2d 61 6c 69 73 |auto-fol|der-alis|
|00000860| 74 20 61 72 67 20 79 2d | 6f 72 2d 6e 2d 70 20 66 |t arg y-|or-n-p f|
|00000870| 6f 72 6d 61 74 20 22 53 | 61 76 65 20 6d 65 73 73 |ormat "S|ave mess|
|00000880| 61 67 65 20 25 73 20 69 | 6e 20 66 6f 6c 64 65 72 |age %s i|n folder|
|00000890| 20 25 73 3f 20 22 20 31 | 20 76 6d 2d 64 65 6c 65 | %s? " 1| vm-dele|
|000008a0| 74 65 2d 61 66 74 65 72 | 2d 61 72 63 68 69 76 69 |te-after|-archivi|
|000008b0| 6e 67 20 76 6d 2d 64 65 | 6c 65 74 65 2d 61 66 74 |ng vm-de|lete-aft|
|000008c0| 65 72 2d 73 61 76 69 6e | 67 20 22 2f 64 65 76 2f |er-savin|g "/dev/|
|000008d0| 6e 75 6c 6c 22 20 76 6d | 2d 73 61 76 65 2d 6d 65 |null" vm|-save-me|
|000008e0| 73 73 61 67 65 20 22 25 | 64 20 61 72 63 68 69 76 |ssage "%|d archiv|
|000008f0| 65 64 2c 20 73 74 69 6c | 6c 20 77 6f 72 6b 69 6e |ed, stil|l workin|
|00000900| 67 2e 2e 2e 22 20 6d 65 | 73 73 61 67 65 20 22 4e |g..." me|ssage "N|
|00000910| 6f 20 6d 65 73 73 61 67 | 65 73 20 61 72 63 68 69 |o messag|es archi|
|00000920| 76 65 64 22 20 22 25 64 | 20 6d 65 73 73 61 67 65 |ved" "%d| message|
|00000930| 25 73 20 61 72 63 68 69 | 76 65 64 22 20 22 22 20 |%s archi|ved" "" |
|00000940| 22 73 22 5d 20 35 20 22 | 5c 0a 53 61 76 65 20 61 |"s"] 5 "|\.Save a|
|00000950| 6c 6c 20 75 6e 66 69 6c | 65 64 20 6d 65 73 73 61 |ll unfil|ed messa|
|00000960| 67 65 73 20 74 68 61 74 | 20 61 75 74 6f 2d 6d 61 |ges that| auto-ma|
|00000970| 74 63 68 20 61 20 66 6f | 6c 64 65 72 20 76 69 61 |tch a fo|lder via|
|00000980| 0a 76 6d 2d 61 75 74 6f | 2d 66 6f 6c 64 65 72 2d |.vm-auto|-folder-|
|00000990| 61 6c 69 73 74 20 74 6f | 20 74 68 65 69 72 20 61 |alist to| their a|
|000009a0| 70 70 72 6f 70 72 69 61 | 74 65 20 66 6f 6c 64 65 |ppropria|te folde|
|000009b0| 72 73 2e 20 20 4d 65 73 | 73 61 67 65 73 20 74 68 |rs.  Mes|sages th|
|000009c0| 61 74 0a 61 72 65 20 66 | 6c 61 67 67 65 64 20 66 |at.are f|lagged f|
|000009d0| 6f 72 20 64 65 6c 65 74 | 69 6f 6e 20 61 72 65 20 |or delet|ion are |
|000009e0| 6e 6f 74 20 73 61 76 65 | 64 2e 0a 0a 50 72 65 66 |not save|d...Pref|
|000009f0| 69 78 20 61 72 67 20 6d | 65 61 6e 73 20 74 6f 20 |ix arg m|eans to |
|00000a00| 61 73 6b 20 75 73 65 72 | 20 66 6f 72 20 63 6f 6e |ask user| for con|
|00000a10| 66 69 72 6d 61 74 69 6f | 6e 20 62 65 66 6f 72 65 |firmatio|n before|
|00000a20| 20 73 61 76 69 6e 67 20 | 65 61 63 68 20 6d 65 73 | saving |each mes|
|00000a30| 73 61 67 65 2e 0a 0a 57 | 68 65 6e 20 69 6e 76 6f |sage...W|hen invo|
|00000a40| 6b 65 64 20 6f 6e 20 6d | 61 72 6b 65 64 20 6d 65 |ked on m|arked me|
|00000a50| 73 73 61 67 65 73 20 28 | 76 69 61 20 76 6d 2d 6e |ssages (|via vm-n|
|00000a60| 65 78 74 2d 63 6f 6d 6d | 61 6e 64 2d 75 73 65 73 |ext-comm|and-uses|
|00000a70| 2d 6d 61 72 6b 73 29 2c | 0a 6f 6e 6c 79 20 6d 61 |-marks),|.only ma|
|00000a80| 72 6b 65 64 20 6d 65 73 | 73 61 67 65 73 20 61 72 |rked mes|sages ar|
|00000a90| 65 20 63 68 65 63 6b 65 | 64 20 61 67 61 69 6e 73 |e checke|d agains|
|00000aa0| 74 20 76 6d 2d 61 75 74 | 6f 2d 66 6f 6c 64 65 72 |t vm-aut|o-folder|
|00000ab0| 2d 61 6c 69 73 74 2e 0a | 0a 54 68 65 20 73 61 76 |-alist..|.The sav|
|00000ac0| 65 64 20 6d 65 73 73 61 | 67 65 73 20 61 72 65 20 |ed messa|ges are |
|00000ad0| 66 6c 61 67 67 65 64 20 | 61 73 20 60 66 69 6c 65 |flagged |as `file|
|00000ae0| 64 27 2e 22 20 22 50 22 | 5d 29 0a 28 66 73 65 74 |d'." "P"|]).(fset|
|00000af0| 20 27 76 6d 2d 73 61 76 | 65 2d 6d 65 73 73 61 67 | 'vm-sav|e-messag|
|00000b00| 65 20 23 5b 28 66 6f 6c | 64 65 72 20 26 6f 70 74 |e #[(fol|der &opt|
|00000b10| 69 6f 6e 61 6c 20 63 6f | 75 6e 74 29 20 22 c0 19 |ional co|unt) "..|
|00000b20| 5c 6e 11 0b ab 8d c4 0b | 21 ac 85 c5 c6 21 ab 83 |\n......|!....!..|
|00000b30| 0b 71 88 c7 20 88 c8 20 | 88 c9 c0 89 ca cb 24 88 |.q.. .. |......$.|
|00000b40| 0e 0c ac 83 cd 16 0c ce | 0e 0f ae 82 0e 10 21 1e |........|......!.|
|00000b50| 10 ce 5c 6e 21 12 29 0e | 11 ab 9d 74 ab 9a d2 5c |..\n!.).|...t...\|
|00000b60| 6e 21 ac 95 0e 13 ab 85 | d4 5c 6e 21 ac 8c d5 d6 |n!......|.\n!....|
|00000b70| d7 5c 6e 5c 22 21 ac 84 | c5 d8 21 88 0e 13 ac 8a |.\n\"!..|..!.....|
|00000b80| d4 5c 6e 21 ab 85 c5 d9 | 5c 6e 5c 22 88 da 0e 0c |.\n!....|\n\"....|
|00000b90| 21 c0 db c0 89 1e 1c 1e | 1d 1e 0c 1e 1e 89 1e 1f |!.......|........|
|00000ba0| ab 99 0e 13 e0 3d ab 93 | d4 5c 6e 21 ae 8a e0 c0 |.....=..|.\n!....|
|00000bb0| 1e 21 1e 5c 22 e3 5c 6e | 21 2a 16 1d aa 8d 0e 1f |.!.\".\n|!*......|
|00000bc0| ab 89 0e 13 ab 85 d4 5c | 6e 21 16 1d 0e 1f ab a4 |.......\|n!......|
|00000bd0| 0e 24 ab a0 e5 5c 6e 21 | ae 8f 0e 26 ae 8b 0e 1f |.$...\n!|...&....|
|00000be0| ad 87 0e 1f 40 cd 48 e7 | 48 89 16 1c e8 3d ab 85 |....@.H.|H....=..|
|00000bf0| c5 e9 5c 6e 5c 22 88 0e | 1f ab a8 ea 5c 6e 21 89 |..\n\"..|....\n!.|
|00000c00| 1e 2b ab 88 e7 0e 2b 38 | db 55 ab 97 0e 1d ac 8a |.+....+8|.U......|
|00000c10| ec 5c 6e ed 0e 1c 21 5c | 22 88 aa 89 ec 0e 1d ed |.\n...!\|".......|
|00000c20| 0e 1c 21 5c 22 88 29 8a | 0e 1f 83 f3 02 0e 1f 40 |..!\".).|.......@|
|00000c30| cd 48 ee 48 4a 89 16 1e | cd 48 ef 48 71 88 f0 20 |.H.HJ...|.H.Hq.. |
|00000c40| 64 65 5a 56 c0 89 1e 31 | 1e 32 89 1e 33 ab 91 f4 |deZV...1|.2..3...|
|00000c50| 20 65 c0 93 89 16 32 ab | 87 f4 20 64 c0 93 16 31 | e....2.|.. d...1|
|00000c60| f5 8e 7e 88 f6 0e 1e e0 | 5c 22 88 0e 1d 84 d7 01 |..~.....|\"......|
|00000c70| 0e 24 ab 8b 0e 1c 0e 1e | cd 48 e7 48 3d ab 95 f7 |.$......|.H.H=...|
|00000c80| 0e 1e db 48 db 48 0e 1e | db 48 ee 48 5c 6e e0 f8 |...H.H..|.H.H\n..|
|00000c90| 25 88 82 cc 02 0e 39 ac | ad fa 0e 1f 40 21 ac 8f |%.....9.|....@!..|
|00000ca0| c5 fb 0e 1e cd 48 e7 48 | 0e 1c 23 88 82 cc 02 c5 |.....H.H|..#.....|
|00000cb0| fc 0e 1f 40 cd 48 db 48 | 5c 6e 0e 1e cd 48 e7 48 |...@.H.H|\n...H.H|
|00000cc0| 0e 1c 25 88 82 cc 02 ec | 5c 6e fd 0e 1c 0e 1e e0 |..%.....|\n......|
|00000cd0| 23 5c 22 88 0e 1c fe 3d | ab 93 ec 5c 6e 0e 3f 81 |#\"....=|...\n.?.|
|00000ce0| 40 00 81 41 00 0e 1e 21 | 81 42 00 52 5c 22 88 f7 |@..A...!|.B.R\"..|
|00000cf0| 0e 1e db 48 cd 48 0e 1e | db 48 81 43 00 48 5c 6e |...H.H..|.H.C.H\n|
|00000d00| e0 f8 25 88 ec 5c 6e 81 | 44 00 0e 1c 21 5c 22 88 |..%..\n.|D...!\".|
|00000d10| 82 cc 02 8a 0e 1d 71 88 | 0e 45 ab 8a 81 46 00 81 |......q.|.E...F..|
|00000d20| 47 00 70 43 5c 22 88 c0 | 1e 48 f0 20 64 65 5a 56 |G.pC\"..|.H. deZV|
|00000d30| c0 89 1e 49 1e 4a 89 1e | 4b ab 91 f4 20 65 c0 93 |...I.J..|K... e..|
|00000d40| 89 16 4a ab 87 f4 20 64 | c0 93 16 49 81 4c 00 8e |..J... d|...I.L..|
|00000d50| 7e 88 8a 64 62 88 0e 24 | ab 8b 0e 1c 0e 1e cd 48 |~..db..$|.......H|
|00000d60| e7 48 3d ab 99 81 4d 00 | 0e 1e cd 48 ef 48 0e 1e |.H=...M.|...H.H..|
|00000d70| db 48 db 48 0e 1e db 48 | ee 48 23 88 aa f6 0e 39 |.H.H...H|.H#....9|
|00000d80| ac ab fa 0e 1f 40 21 ac | 8e c5 fb 0e 1e cd 48 e7 |.....@!.|......H.|
|00000d90| 48 0e 1c 23 88 aa dd c5 | fc 0e 1f 40 cd 48 db 48 |H..#....|...@.H.H|
|00000da0| 5c 6e 0e 1e cd 48 e7 48 | 0e 1c 25 88 aa c7 ec 70 |\n...H.H|..%....p|
|00000db0| fd 0e 1c 0e 1e e0 23 5c | 22 88 0e 1c fe 3d ab 93 |......#\|"....=..|
|00000dc0| ec 70 0e 3f 81 40 00 81 | 41 00 0e 1e 21 81 42 00 |.p.?.@..|A...!.B.|
|00000dd0| 52 5c 22 88 81 4d 00 0e | 1e cd 48 ef 48 0e 1e db |R\"..M..|..H.H...|
|00000de0| 48 cd 48 0e 1e db 48 81 | 43 00 48 23 88 ec 70 81 |H.H...H.|C.H#..p.|
|00000df0| 44 00 0e 1c 21 5c 22 88 | 29 0e 4e 81 4f 00 3d ab |D...!\".|).N.O.=.|
|00000e00| 8a 0e 50 54 16 50 81 51 | 00 20 88 2e 06 0e 1e 81 |..PT.P.Q|. ......|
|00000e10| 52 00 48 81 53 00 48 ac | 88 81 54 00 0e 1e e0 5c |R.H.S.H.|..T....\|
|00000e20| 22 88 0e 0c 54 16 0c 81 | 55 00 20 88 0e 1f 41 16 |"...T...|U. ...A.|
|00000e30| 1f 2c 82 f6 00 29 0e 1e | ab f5 0e 1d ab d6 8a 0e |.,...)..|........|
|00000e40| 1d 71 88 0e 4e 81 4f 00 | 3d ab a8 c7 20 88 81 56 |.q..N.O.|=... ..V|
|00000e50| 00 20 88 0e 57 ac 97 0e | 58 16 57 e0 16 59 81 5a |. ..W...|X.W..Y.Z|
|00000e60| 00 c4 20 0e 5b 5c 22 88 | 81 5c 5c 00 20 88 aa 85 |.. .[\".|.\\. ...|
|00000e70| 81 55 00 20 88 29 74 ab | b8 81 5d 00 81 5e 00 0e |.U. .)t.|..]..^..|
|00000e80| 0c 89 cd 55 ac 85 81 5f | 00 aa 83 81 60 00 c4 0e |...U..._|....`...|
|00000e90| 1d 21 24 88 aa 9b 74 ab | 98 81 5d 00 81 61 00 0e |.!$...t.|..]..a..|
|00000ea0| 0c 89 cd 55 ac 85 81 5f | 00 aa 83 81 60 00 5c 6e |...U..._|....`.\n|
|00000eb0| 24 88 2d 09 16 62 0e 63 | ad 86 81 64 00 0e 0c 21 |$.-..b.c|...d...!|
|00000ec0| 29 87 22 20 5b 6e 69 6c | 20 75 6e 65 78 70 61 6e |)." [nil| unexpan|
|00000ed0| 64 65 64 2d 66 6f 6c 64 | 65 72 20 66 6f 6c 64 65 |ded-fold|er folde|
|00000ee0| 72 20 76 6d 2d 6d 61 69 | 6c 2d 62 75 66 66 65 72 |r vm-mai|l-buffer|
|00000ef0| 20 62 75 66 66 65 72 2d | 6e 61 6d 65 20 65 72 72 | buffer-|name err|
|00000f00| 6f 72 20 22 46 6f 6c 64 | 65 72 20 62 75 66 66 65 |or "Fold|er buffe|
|00000f10| 72 20 68 61 73 20 62 65 | 65 6e 20 6b 69 6c 6c 65 |r has be|en kille|
|00000f20| 64 2e 22 20 76 6d 2d 63 | 68 65 63 6b 2d 66 6f 72 |d." vm-c|heck-for|
|00000f30| 2d 6b 69 6c 6c 65 64 2d | 73 75 6d 6d 61 72 79 20 |-killed-|summary |
|00000f40| 76 6d 2d 65 72 72 6f 72 | 2d 69 66 2d 66 6f 6c 64 |vm-error|-if-fold|
|00000f50| 65 72 2d 65 6d 70 74 79 | 20 76 6d 2d 64 69 73 70 |er-empty| vm-disp|
|00000f60| 6c 61 79 20 28 76 6d 2d | 73 61 76 65 2d 6d 65 73 |lay (vm-|save-mes|
|00000f70| 73 61 67 65 29 20 28 76 | 6d 2d 73 61 76 65 2d 6d |sage) (v|m-save-m|
|00000f80| 65 73 73 61 67 65 29 20 | 63 6f 75 6e 74 20 31 20 |essage) |count 1 |
|00000f90| 65 78 70 61 6e 64 2d 66 | 69 6c 65 2d 6e 61 6d 65 |expand-f|ile-name|
|00000fa0| 20 76 6d 2d 66 6f 6c 64 | 65 72 2d 64 69 72 65 63 | vm-fold|er-direc|
|00000fb0| 74 6f 72 79 20 64 65 66 | 61 75 6c 74 2d 64 69 72 |tory def|ault-dir|
|00000fc0| 65 63 74 6f 72 79 20 76 | 6d 2d 63 6f 6e 66 69 72 |ectory v|m-confir|
|00000fd0| 6d 2d 6e 65 77 2d 66 6f | 6c 64 65 72 73 20 66 69 |m-new-fo|lders fi|
|00000fe0| 6c 65 2d 65 78 69 73 74 | 73 2d 70 20 76 6d 2d 76 |le-exist|s-p vm-v|
|00000ff0| 69 73 69 74 2d 77 68 65 | 6e 2d 73 61 76 69 6e 67 |isit-whe|n-saving|
|00001000| 20 76 6d 2d 67 65 74 2d | 66 69 6c 65 2d 62 75 66 | vm-get-|file-buf|
|00001010| 66 65 72 20 79 2d 6f 72 | 2d 6e 2d 70 20 66 6f 72 |fer y-or|-n-p for|
|00001020| 6d 61 74 20 22 25 73 20 | 64 6f 65 73 20 6e 6f 74 |mat "%s |does not|
|00001030| 20 65 78 69 73 74 2c 20 | 73 61 76 65 20 74 68 65 | exist, |save the|
|00001040| 72 65 20 61 6e 79 77 61 | 79 3f 20 22 20 22 53 61 |re anywa|y? " "Sa|
|00001050| 76 65 20 61 62 6f 72 74 | 65 64 22 20 22 46 6f 6c |ve abort|ed" "Fol|
|00001060| 64 65 72 20 25 73 20 69 | 73 20 62 65 69 6e 67 20 |der %s i|s being |
|00001070| 76 69 73 69 74 65 64 2c | 20 63 61 6e 6e 6f 74 20 |visited,| cannot |
|00001080| 73 61 76 65 2e 22 20 76 | 6d 2d 73 65 6c 65 63 74 |save." v|m-select|
|00001090| 2d 6d 61 72 6b 65 64 2d | 6f 72 2d 70 72 65 66 69 |-marked-|or-prefi|
|000010a0| 78 65 64 2d 6d 65 73 73 | 61 67 65 73 20 30 20 74 |xed-mess|ages 0 t|
|000010b0| 61 72 67 65 74 2d 74 79 | 70 65 20 66 6f 6c 64 65 |arget-ty|pe folde|
|000010c0| 72 2d 62 75 66 66 65 72 | 20 6d 20 6d 6c 69 73 74 |r-buffer| m mlist|
|000010d0| 20 74 20 65 6e 61 62 6c | 65 2d 6c 6f 63 61 6c 2d | t enabl|e-local-|
|000010e0| 76 61 72 69 61 62 6c 65 | 73 20 69 6e 68 69 62 69 |variable|s inhibi|
|000010f0| 74 2d 6c 6f 63 61 6c 2d | 76 61 72 69 61 62 6c 65 |t-local-|variable|
|00001100| 73 20 66 69 6e 64 2d 66 | 69 6c 65 2d 6e 6f 73 65 |s find-f|ile-nose|
|00001110| 6c 65 63 74 20 76 6d 2d | 63 68 65 63 6b 2d 66 6f |lect vm-|check-fo|
|00001120| 6c 64 65 72 2d 74 79 70 | 65 73 20 76 6d 2d 67 65 |lder-typ|es vm-ge|
|00001130| 74 2d 66 6f 6c 64 65 72 | 2d 74 79 70 65 20 76 6d |t-folder|-type vm|
|00001140| 2d 64 65 66 61 75 6c 74 | 2d 66 6f 6c 64 65 72 2d |-default|-folder-|
|00001150| 74 79 70 65 20 37 20 75 | 6e 6b 6e 6f 77 6e 20 22 |type 7 u|nknown "|
|00001160| 46 6f 6c 64 65 72 20 25 | 73 27 73 20 74 79 70 65 |Folder %|s's type|
|00001170| 20 69 73 20 75 6e 72 65 | 63 6f 67 6e 69 7a 65 64 | is unre|cognized|
|00001180| 22 20 66 69 6c 65 2d 61 | 74 74 72 69 62 75 74 65 |" file-a|ttribute|
|00001190| 73 20 61 74 74 72 73 20 | 76 6d 2d 77 72 69 74 65 |s attrs |vm-write|
|000011a0| 2d 73 74 72 69 6e 67 20 | 76 6d 2d 66 6f 6c 64 65 |-string |vm-folde|
|000011b0| 72 2d 68 65 61 64 65 72 | 20 35 20 39 20 62 75 66 |r-header| 5 9 buf|
|000011c0| 66 65 72 2d 73 69 7a 65 | 20 76 6d 2d 73 72 2d 6d |fer-size| vm-sr-m|
|000011d0| 61 78 20 76 6d 2d 73 72 | 2d 6d 69 6e 20 76 6d 2d |ax vm-sr|-min vm-|
|000011e0| 73 72 2d 63 6c 69 70 20 | 6d 61 6b 65 2d 6d 61 72 |sr-clip |make-mar|
|000011f0| 6b 65 72 20 28 28 62 79 | 74 65 2d 63 6f 64 65 20 |ker ((by|te-code |
|00001200| 22 7e 88 08 ab 8e 09 5c | 6e 7d 88 09 c3 89 93 88 |"~.....\|n}......|
|00001210| 5c 6e c3 89 93 88 c3 87 | 22 20 5b 76 6d 2d 73 72 |\n......|" [vm-sr|
|00001220| 2d 63 6c 69 70 20 76 6d | 2d 73 72 2d 6d 69 6e 20 |-clip vm|-sr-min |
|00001230| 76 6d 2d 73 72 2d 6d 61 | 78 20 6e 69 6c 5d 20 33 |vm-sr-ma|x nil] 3|
|00001240| 29 29 20 76 6d 2d 73 74 | 75 66 66 2d 61 74 74 72 |)) vm-st|uff-attr|
|00001250| 69 62 75 74 65 73 20 77 | 72 69 74 65 2d 72 65 67 |ibutes w|rite-reg|
|00001260| 69 6f 6e 20 71 75 69 65 | 74 20 76 6d 2d 63 6f 6e |ion quie|t vm-con|
|00001270| 76 65 72 74 2d 66 6f 6c | 64 65 72 2d 74 79 70 65 |vert-fol|der-type|
|00001280| 73 20 76 6d 2d 76 69 72 | 74 75 61 6c 2d 6d 65 73 |s vm-vir|tual-mes|
|00001290| 73 61 67 65 2d 70 20 22 | 46 6f 6c 64 65 72 20 74 |sage-p "|Folder t|
|000012a0| 79 70 65 20 6d 69 73 6d | 61 74 63 68 3a 20 25 73 |ype mism|atch: %s|
|000012b0| 2c 20 25 73 22 20 22 4d | 65 73 73 61 67 65 20 25 |, %s" "M|essage %|
|000012c0| 73 20 74 79 70 65 20 6d | 69 73 6d 61 74 63 68 65 |s type m|ismatche|
|000012d0| 73 20 66 6f 6c 64 65 72 | 20 25 73 22 20 76 6d 2d |s folder| %s" vm-|
|000012e0| 6c 65 61 64 69 6e 67 2d | 6d 65 73 73 61 67 65 2d |leading-|message-|
|000012f0| 73 65 70 61 72 61 74 6f | 72 20 46 72 6f 6d 5f 2d |separato|r From_-|
|00001300| 77 69 74 68 2d 43 6f 6e | 74 65 6e 74 2d 4c 65 6e |with-Con|tent-Len|
|00001310| 67 74 68 20 76 6d 2d 63 | 6f 6e 74 65 6e 74 2d 6c |gth vm-c|ontent-l|
|00001320| 65 6e 67 74 68 2d 68 65 | 61 64 65 72 20 22 20 22 |ength-he|ader " "|
|00001330| 20 76 6d 2d 73 75 2d 62 | 79 74 65 2d 63 6f 75 6e | vm-su-b|yte-coun|
|00001340| 74 20 22 5c 6e 22 20 34 | 20 76 6d 2d 74 72 61 69 |t "\n" 4| vm-trai|
|00001350| 6c 69 6e 67 2d 6d 65 73 | 73 61 67 65 2d 73 65 70 |ling-mes|sage-sep|
|00001360| 61 72 61 74 6f 72 20 76 | 6d 2d 66 6f 6c 64 65 72 |arator v|m-folder|
|00001370| 2d 72 65 61 64 2d 6f 6e | 6c 79 20 73 69 67 6e 61 |-read-on|ly signa|
|00001380| 6c 20 66 6f 6c 64 65 72 | 2d 72 65 61 64 2d 6f 6e |l folder|-read-on|
|00001390| 6c 79 20 62 75 66 66 65 | 72 2d 72 65 61 64 2d 6f |ly buffe|r-read-o|
|000013a0| 6e 6c 79 20 76 6d 2d 73 | 72 2d 6d 61 78 20 76 6d |nly vm-s|r-max vm|
|000013b0| 2d 73 72 2d 6d 69 6e 20 | 76 6d 2d 73 72 2d 63 6c |-sr-min |vm-sr-cl|
|000013c0| 69 70 20 28 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |ip ((byt|e-code "|
|000013d0| 7e 88 08 ab 8e 09 5c 6e | 7d 88 09 c3 89 93 88 5c |~.....\n|}......\|
|000013e0| 6e c3 89 93 88 c3 87 22 | 20 5b 76 6d 2d 73 72 2d |n......"| [vm-sr-|
|000013f0| 63 6c 69 70 20 76 6d 2d | 73 72 2d 6d 69 6e 20 76 |clip vm-|sr-min v|
|00001400| 6d 2d 73 72 2d 6d 61 78 | 20 6e 69 6c 5d 20 33 29 |m-sr-max| nil] 3)|
|00001410| 29 20 69 6e 73 65 72 74 | 2d 62 75 66 66 65 72 2d |) insert|-buffer-|
|00001420| 73 75 62 73 74 72 69 6e | 67 20 6d 61 6a 6f 72 2d |substrin|g major-|
|00001430| 6d 6f 64 65 20 76 6d 2d | 6d 6f 64 65 20 76 6d 2d |mode vm-|mode vm-|
|00001440| 6d 65 73 73 61 67 65 73 | 2d 6e 6f 74 2d 6f 6e 2d |messages|-not-on-|
|00001450| 64 69 73 6b 20 76 6d 2d | 63 6c 65 61 72 2d 6d 6f |disk vm-|clear-mo|
|00001460| 64 69 66 69 63 61 74 69 | 6f 6e 2d 66 6c 61 67 2d |dificati|on-flag-|
|00001470| 75 6e 64 6f 73 20 32 20 | 33 20 76 6d 2d 73 65 74 |undos 2 |3 vm-set|
|00001480| 2d 66 69 6c 65 64 2d 66 | 6c 61 67 20 76 6d 2d 75 |-filed-f|lag vm-u|
|00001490| 70 64 61 74 65 2d 73 75 | 6d 6d 61 72 79 2d 61 6e |pdate-su|mmary-an|
|000014a0| 64 2d 6d 6f 64 65 2d 6c | 69 6e 65 20 76 6d 2d 61 |d-mode-l|ine vm-a|
|000014b0| 73 73 69 6d 69 6c 61 74 | 65 2d 6e 65 77 2d 6d 65 |ssimilat|e-new-me|
|000014c0| 73 73 61 67 65 73 20 76 | 6d 2d 6d 65 73 73 61 67 |ssages v|m-messag|
|000014d0| 65 2d 70 6f 69 6e 74 65 | 72 20 76 6d 2d 6d 65 73 |e-pointe|r vm-mes|
|000014e0| 73 61 67 65 2d 6c 69 73 | 74 20 76 6d 2d 6e 65 65 |sage-lis|t vm-nee|
|000014f0| 64 2d 73 75 6d 6d 61 72 | 79 2d 70 6f 69 6e 74 65 |d-summar|y-pointe|
|00001500| 72 2d 75 70 64 61 74 65 | 20 69 6e 74 65 72 6e 20 |r-update| intern |
|00001510| 76 6d 2d 62 75 66 66 65 | 72 73 2d 6e 65 65 64 69 |vm-buffe|rs-needi|
|00001520| 6e 67 2d 64 69 73 70 6c | 61 79 2d 75 70 64 61 74 |ng-displ|ay-updat|
|00001530| 65 20 76 6d 2d 70 72 65 | 76 69 65 77 2d 63 75 72 |e vm-pre|view-cur|
|00001540| 72 65 6e 74 2d 6d 65 73 | 73 61 67 65 20 6d 65 73 |rent-mes|sage mes|
|00001550| 73 61 67 65 20 22 25 64 | 20 6d 65 73 73 61 67 65 |sage "%d| message|
|00001560| 25 73 20 73 61 76 65 64 | 20 74 6f 20 62 75 66 66 |%s saved| to buff|
|00001570| 65 72 20 25 73 22 20 22 | 73 22 20 22 22 20 22 25 |er %s" "|s" "" "%|
|00001580| 64 20 6d 65 73 73 61 67 | 65 25 73 20 73 61 76 65 |d messag|e%s save|
|00001590| 64 20 74 6f 20 25 73 22 | 20 76 6d 2d 6c 61 73 74 |d to %s"| vm-last|
|000015a0| 2d 73 61 76 65 2d 66 6f | 6c 64 65 72 20 76 6d 2d |-save-fo|lder vm-|
|000015b0| 64 65 6c 65 74 65 2d 61 | 66 74 65 72 2d 73 61 76 |delete-a|fter-sav|
|000015c0| 69 6e 67 20 76 6d 2d 64 | 65 6c 65 74 65 2d 6d 65 |ing vm-d|elete-me|
|000015d0| 73 73 61 67 65 5d 20 37 | 20 22 5c 0a 53 61 76 65 |ssage] 7| "\.Save|
|000015e0| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 6d 65 73 | the cur|rent mes|
|000015f0| 73 61 67 65 20 74 6f 20 | 61 20 6d 61 69 6c 20 66 |sage to |a mail f|
|00001600| 6f 6c 64 65 72 2e 0a 49 | 66 20 74 68 65 20 66 6f |older..I|f the fo|
|00001610| 6c 64 65 72 20 61 6c 72 | 65 61 64 79 20 65 78 69 |lder alr|eady exi|
|00001620| 73 74 73 2c 20 74 68 65 | 20 6d 65 73 73 61 67 65 |sts, the| message|
|00001630| 20 77 69 6c 6c 20 62 65 | 20 61 70 70 65 6e 64 65 | will be| appende|
|00001640| 64 20 74 6f 20 69 74 2e | 0a 0a 50 72 65 66 69 78 |d to it.|..Prefix|
|00001650| 20 61 72 67 20 43 4f 55 | 4e 54 20 6d 65 61 6e 73 | arg COU|NT means|
|00001660| 20 73 61 76 65 20 74 68 | 69 73 20 6d 65 73 73 61 | save th|is messa|
|00001670| 67 65 20 61 6e 64 20 74 | 68 65 20 6e 65 78 74 20 |ge and t|he next |
|00001680| 43 4f 55 4e 54 2d 31 0a | 6d 65 73 73 61 67 65 73 |COUNT-1.|messages|
|00001690| 2e 20 20 41 20 6e 65 67 | 61 74 69 76 65 20 43 4f |.  A neg|ative CO|
|000016a0| 55 4e 54 20 6d 65 61 6e | 73 20 73 61 76 65 20 74 |UNT mean|s save t|
|000016b0| 68 69 73 20 6d 65 73 73 | 61 67 65 20 61 6e 64 20 |his mess|age and |
|000016c0| 74 68 65 0a 70 72 65 76 | 69 6f 75 73 20 43 4f 55 |the.prev|ious COU|
|000016d0| 4e 54 2d 31 20 6d 65 73 | 73 61 67 65 73 2e 0a 0a |NT-1 mes|sages...|
|000016e0| 57 68 65 6e 20 69 6e 76 | 6f 6b 65 64 20 6f 6e 20 |When inv|oked on |
|000016f0| 6d 61 72 6b 65 64 20 6d | 65 73 73 61 67 65 73 20 |marked m|essages |
|00001700| 28 76 69 61 20 76 6d 2d | 6e 65 78 74 2d 63 6f 6d |(via vm-|next-com|
|00001710| 6d 61 6e 64 2d 75 73 65 | 73 2d 6d 61 72 6b 73 29 |mand-use|s-marks)|
|00001720| 2c 0a 61 6c 6c 20 6d 61 | 72 6b 65 64 20 6d 65 73 |,.all ma|rked mes|
|00001730| 73 61 67 65 73 20 69 6e | 20 74 68 65 20 63 75 72 |sages in| the cur|
|00001740| 72 65 6e 74 20 66 6f 6c | 64 65 72 20 61 72 65 20 |rent fol|der are |
|00001750| 73 61 76 65 64 3b 20 6f | 74 68 65 72 20 6d 65 73 |saved; o|ther mes|
|00001760| 73 61 67 65 73 20 61 72 | 65 0a 69 67 6e 6f 72 65 |sages ar|e.ignore|
|00001770| 64 2e 0a 0a 54 68 65 20 | 73 61 76 65 64 20 6d 65 |d...The |saved me|
|00001780| 73 73 61 67 65 73 20 61 | 72 65 20 66 6c 61 67 67 |ssages a|re flagg|
|00001790| 65 64 20 61 73 20 60 66 | 69 6c 65 64 27 2e 22 20 |ed as `f|iled'." |
|000017a0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 08 09 19 18 |(byte-co|de "....|
|000017b0| c2 20 88 8a 0b ab 8d c4 | 0b 21 ac 85 c5 c6 21 ab |. ......|.!....!.|
|000017c0| 83 0b 71 88 c7 20 88 c8 | 20 88 c9 0e 5c 6e 0e 0b |..q.. ..| ...\n..|
|000017d0| 5c 22 ae 82 0e 0c 29 0e | 0d ae 82 0e 0e 1e 0f 89 |\"....).|........|
|000017e0| 1e 10 ab 96 0e 0f 1e 0e | d1 0e 10 21 29 ab 8b d2 |........|...!)...|
|000017f0| d3 0e 0f d4 89 0e 10 25 | aa 97 0e 10 ab 8d d2 d5 |.......%|........|
|00001800| d6 0e 10 5c 22 0e 0f 0e | 10 23 aa 86 d2 d3 0e 0f |...\"...|.#......|
|00001810| d4 23 2c d7 0e 18 21 44 | 87 22 20 5b 6c 61 73 74 |.#,...!D|." [last|
|00001820| 2d 63 6f 6d 6d 61 6e 64 | 20 74 68 69 73 2d 63 6f |-command| this-co|
|00001830| 6d 6d 61 6e 64 20 76 6d | 2d 66 6f 6c 6c 6f 77 2d |mmand vm|-follow-|
|00001840| 73 75 6d 6d 61 72 79 2d | 63 75 72 73 6f 72 20 76 |summary-|cursor v|
|00001850| 6d 2d 6d 61 69 6c 2d 62 | 75 66 66 65 72 20 62 75 |m-mail-b|uffer bu|
|00001860| 66 66 65 72 2d 6e 61 6d | 65 20 65 72 72 6f 72 20 |ffer-nam|e error |
|00001870| 22 46 6f 6c 64 65 72 20 | 62 75 66 66 65 72 20 68 |"Folder |buffer h|
|00001880| 61 73 20 62 65 65 6e 20 | 6b 69 6c 6c 65 64 2e 22 |as been |killed."|
|00001890| 20 76 6d 2d 63 68 65 63 | 6b 2d 66 6f 72 2d 6b 69 | vm-chec|k-for-ki|
|000018a0| 6c 6c 65 64 2d 73 75 6d | 6d 61 72 79 20 76 6d 2d |lled-sum|mary vm-|
|000018b0| 65 72 72 6f 72 2d 69 66 | 2d 66 6f 6c 64 65 72 2d |error-if|-folder-|
|000018c0| 65 6d 70 74 79 20 76 6d | 2d 61 75 74 6f 2d 73 65 |empty vm|-auto-se|
|000018d0| 6c 65 63 74 2d 66 6f 6c | 64 65 72 20 76 6d 2d 6d |lect-fol|der vm-m|
|000018e0| 65 73 73 61 67 65 2d 70 | 6f 69 6e 74 65 72 20 76 |essage-p|ointer v|
|000018f0| 6d 2d 61 75 74 6f 2d 66 | 6f 6c 64 65 72 2d 61 6c |m-auto-f|older-al|
|00001900| 69 73 74 20 76 6d 2d 6c | 61 73 74 2d 73 61 76 65 |ist vm-l|ast-save|
|00001910| 2d 66 6f 6c 64 65 72 20 | 76 6d 2d 66 6f 6c 64 65 |-folder |vm-folde|
|00001920| 72 2d 64 69 72 65 63 74 | 6f 72 79 20 64 65 66 61 |r-direct|ory defa|
|00001930| 75 6c 74 2d 64 69 72 65 | 63 74 6f 72 79 20 64 69 |ult-dire|ctory di|
|00001940| 72 20 64 65 66 61 75 6c | 74 20 66 69 6c 65 2d 64 |r defaul|t file-d|
|00001950| 69 72 65 63 74 6f 72 79 | 2d 70 20 76 6d 2d 72 65 |irectory|-p vm-re|
|00001960| 61 64 2d 66 69 6c 65 2d | 6e 61 6d 65 20 22 53 61 |ad-file-|name "Sa|
|00001970| 76 65 20 69 6e 20 66 6f | 6c 64 65 72 3a 20 22 20 |ve in fo|lder: " |
|00001980| 6e 69 6c 20 66 6f 72 6d | 61 74 20 22 53 61 76 65 |nil form|at "Save|
|00001990| 20 69 6e 20 66 6f 6c 64 | 65 72 3a 20 28 64 65 66 | in fold|er: (def|
|000019a0| 61 75 6c 74 20 25 73 29 | 20 22 20 70 72 65 66 69 |ault %s)| " prefi|
|000019b0| 78 2d 6e 75 6d 65 72 69 | 63 2d 76 61 6c 75 65 20 |x-numeri|c-value |
|000019c0| 63 75 72 72 65 6e 74 2d | 70 72 65 66 69 78 2d 61 |current-|prefix-a|
|000019d0| 72 67 5d 20 37 29 5d 29 | 0a 28 66 73 65 74 20 27 |rg] 7)])|.(fset '|
|000019e0| 76 6d 2d 73 61 76 65 2d | 6d 65 73 73 61 67 65 2d |vm-save-|message-|
|000019f0| 73 61 6e 73 2d 68 65 61 | 64 65 72 73 20 23 5b 28 |sans-hea|ders #[(|
|00001a00| 66 69 6c 65 20 26 6f 70 | 74 69 6f 6e 61 6c 20 63 |file &op|tional c|
|00001a10| 6f 75 6e 74 29 20 22 08 | ab 8d c1 08 21 ac 85 c2 |ount) ".|....!...|
|00001a20| c3 21 ab 83 08 71 88 c4 | 20 88 c5 20 88 c6 c7 89 |.!...q..| .. ....|
|00001a30| c8 c9 24 88 0e 5c 6e ac | 83 cb 16 5c 6e cc 0e 0d |..$..\n.|...\n...|
|00001a40| 21 16 0d 0e 0e ac 8c cf | 0e 0d 21 ab 86 c2 d0 0e |!.......|..!.....|
|00001a50| 0d 5c 22 88 d1 0e 5c 6e | 21 c7 89 1e 12 1e 13 89 |.\"...\n|!.......|
|00001a60| 1e 14 ab 94 0e 0e d5 3d | ab 8e cf 0e 0d 21 ae 84 |.......=|.....!..|
|00001a70| d6 0e 0d 21 16 12 aa 8e | 0e 14 ab 8a 0e 0e ab 86 |...!....|........|
|00001a80| cf 0e 0d 21 16 12 8a 0e | 14 83 29 01 0e 14 40 cb |...!....|..)...@.|
|00001a90| 48 d7 48 4a 89 16 13 cb | 48 d8 48 71 88 d9 20 64 |H.HJ....|H.Hq.. d|
|00001aa0| 65 5a 56 c7 89 1e 1a 1e | 1b 89 1e 1c ab 91 dd 20 |eZV.....|....... |
|00001ab0| 65 c7 93 89 16 1b ab 87 | dd 20 64 c7 93 16 1a de |e.......|. d.....|
|00001ac0| 8e 7e 88 0e 12 ac 93 df | e0 0e 13 21 0e 13 e1 48 |.~......|...!...H|
|00001ad0| e2 48 0e 0d d5 e3 25 88 | aa d0 e0 0e 13 21 0e 13 |.H....%.|.....!..|
|00001ae0| e1 48 e2 48 1e 24 1e 25 | 8a 0e 12 71 88 8a c7 1e |.H.H.$.%|...q....|
|00001af0| 26 d9 20 64 65 5a 56 c7 | 89 1e 27 1e 28 89 1e 29 |&. deZV.|..'.(..)|
|00001b00| ab 91 dd 20 65 c7 93 89 | 16 28 ab 87 dd 20 64 c7 |... e...|.(... d.|
|00001b10| 93 16 27 ea 8e 7e 88 8a | 64 62 88 eb 0e 13 cb 48 |..'..~..|db.....H|
|00001b20| d8 48 0e 25 0e 24 23 88 | 2e 5c 6e 0e 13 ec 48 d7 |.H.%.$#.|.\n...H.|
|00001b30| 48 ac 86 ed 0e 13 d5 5c | 22 88 ee 20 88 0e 14 41 |H......\|".. ...A|
|00001b40| 16 14 2c 82 6c 00 29 0e | 13 ab a8 0e 12 ab 94 ef |..,.l.).|........|
|00001b50| f0 0e 5c 6e cb 55 ac 83 | f1 aa 81 f2 c1 0e 12 21 |..\n.U..|.......!|
|00001b60| 23 88 aa 90 ef f3 0e 5c | 6e cb 55 ac 83 f1 aa 81 |#......\|n.U.....|
|00001b70| f2 0e 0d 23 88 0e 0d 89 | 16 34 2b 87 22 20 5b 76 |...#....|.4+." [v|
|00001b80| 6d 2d 6d 61 69 6c 2d 62 | 75 66 66 65 72 20 62 75 |m-mail-b|uffer bu|
|00001b90| 66 66 65 72 2d 6e 61 6d | 65 20 65 72 72 6f 72 20 |ffer-nam|e error |
|00001ba0| 22 46 6f 6c 64 65 72 20 | 62 75 66 66 65 72 20 68 |"Folder |buffer h|
|00001bb0| 61 73 20 62 65 65 6e 20 | 6b 69 6c 6c 65 64 2e 22 |as been |killed."|
|00001bc0| 20 76 6d 2d 63 68 65 63 | 6b 2d 66 6f 72 2d 6b 69 | vm-chec|k-for-ki|
|00001bd0| 6c 6c 65 64 2d 73 75 6d | 6d 61 72 79 20 76 6d 2d |lled-sum|mary vm-|
|00001be0| 65 72 72 6f 72 2d 69 66 | 2d 66 6f 6c 64 65 72 2d |error-if|-folder-|
|00001bf0| 65 6d 70 74 79 20 76 6d | 2d 64 69 73 70 6c 61 79 |empty vm|-display|
|00001c00| 20 6e 69 6c 20 28 76 6d | 2d 73 61 76 65 2d 6d 65 | nil (vm|-save-me|
|00001c10| 73 73 61 67 65 2d 73 61 | 6e 73 2d 68 65 61 64 65 |ssage-sa|ns-heade|
|00001c20| 72 73 29 20 28 76 6d 2d | 73 61 76 65 2d 6d 65 73 |rs) (vm-|save-mes|
|00001c30| 73 61 67 65 2d 73 61 6e | 73 2d 68 65 61 64 65 72 |sage-san|s-header|
|00001c40| 73 29 20 63 6f 75 6e 74 | 20 31 20 65 78 70 61 6e |s) count| 1 expan|
|00001c50| 64 2d 66 69 6c 65 2d 6e | 61 6d 65 20 66 69 6c 65 |d-file-n|ame file|
|00001c60| 20 76 6d 2d 76 69 73 69 | 74 2d 77 68 65 6e 2d 73 | vm-visi|t-when-s|
|00001c70| 61 76 69 6e 67 20 76 6d | 2d 67 65 74 2d 66 69 6c |aving vm|-get-fil|
|00001c80| 65 2d 62 75 66 66 65 72 | 20 22 46 69 6c 65 20 25 |e-buffer| "File %|
|00001c90| 73 20 69 73 20 62 65 69 | 6e 67 20 76 69 73 69 74 |s is bei|ng visit|
|00001ca0| 65 64 2c 20 63 61 6e 6e | 6f 74 20 73 61 76 65 2e |ed, cann|ot save.|
|00001cb0| 22 20 76 6d 2d 73 65 6c | 65 63 74 2d 6d 61 72 6b |" vm-sel|ect-mark|
|00001cc0| 65 64 2d 6f 72 2d 70 72 | 65 66 69 78 65 64 2d 6d |ed-or-pr|efixed-m|
|00001cd0| 65 73 73 61 67 65 73 20 | 66 69 6c 65 2d 62 75 66 |essages |file-buf|
|00001ce0| 66 65 72 20 6d 20 6d 6c | 69 73 74 20 74 20 66 69 |fer m ml|ist t fi|
|00001cf0| 6e 64 2d 66 69 6c 65 2d | 6e 6f 73 65 6c 65 63 74 |nd-file-|noselect|
|00001d00| 20 35 20 39 20 62 75 66 | 66 65 72 2d 73 69 7a 65 | 5 9 buf|fer-size|
|00001d10| 20 76 6d 2d 73 72 2d 6d | 61 78 20 76 6d 2d 73 72 | vm-sr-m|ax vm-sr|
|00001d20| 2d 6d 69 6e 20 76 6d 2d | 73 72 2d 63 6c 69 70 20 |-min vm-|sr-clip |
|00001d30| 6d 61 6b 65 2d 6d 61 72 | 6b 65 72 20 28 28 62 79 |make-mar|ker ((by|
|00001d40| 74 65 2d 63 6f 64 65 20 | 22 7e 88 08 ab 8e 09 5c |te-code |"~.....\|
|00001d50| 6e 7d 88 09 c3 89 93 88 | 5c 6e c3 89 93 88 c3 87 |n}......|\n......|
|00001d60| 22 20 5b 76 6d 2d 73 72 | 2d 63 6c 69 70 20 76 6d |" [vm-sr|-clip vm|
|00001d70| 2d 73 72 2d 6d 69 6e 20 | 76 6d 2d 73 72 2d 6d 61 |-sr-min |vm-sr-ma|
|00001d80| 78 20 6e 69 6c 5d 20 33 | 29 29 20 77 72 69 74 65 |x nil] 3|)) write|
|00001d90| 2d 72 65 67 69 6f 6e 20 | 76 6d 2d 74 65 78 74 2d |-region |vm-text-|
|00001da0| 6f 66 20 30 20 34 20 71 | 75 69 65 74 20 65 6e 64 |of 0 4 q|uiet end|
|00001db0| 20 73 74 61 72 74 20 62 | 75 66 66 65 72 2d 72 65 | start b|uffer-re|
|00001dc0| 61 64 2d 6f 6e 6c 79 20 | 76 6d 2d 73 72 2d 6d 61 |ad-only |vm-sr-ma|
|00001dd0| 78 20 76 6d 2d 73 72 2d | 6d 69 6e 20 76 6d 2d 73 |x vm-sr-|min vm-s|
|00001de0| 72 2d 63 6c 69 70 20 28 | 28 62 79 74 65 2d 63 6f |r-clip (|(byte-co|
|00001df0| 64 65 20 22 7e 88 08 ab | 8e 09 5c 6e 7d 88 09 c3 |de "~...|..\n}...|
|00001e00| 89 93 88 5c 6e c3 89 93 | 88 c3 87 22 20 5b 76 6d |...\n...|..." [vm|
|00001e10| 2d 73 72 2d 63 6c 69 70 | 20 76 6d 2d 73 72 2d 6d |-sr-clip| vm-sr-m|
|00001e20| 69 6e 20 76 6d 2d 73 72 | 2d 6d 61 78 20 6e 69 6c |in vm-sr|-max nil|
|00001e30| 5d 20 33 29 29 20 69 6e | 73 65 72 74 2d 62 75 66 |] 3)) in|sert-buf|
|00001e40| 66 65 72 2d 73 75 62 73 | 74 72 69 6e 67 20 32 20 |fer-subs|tring 2 |
|00001e50| 76 6d 2d 73 65 74 2d 77 | 72 69 74 74 65 6e 2d 66 |vm-set-w|ritten-f|
|00001e60| 6c 61 67 20 76 6d 2d 75 | 70 64 61 74 65 2d 73 75 |lag vm-u|pdate-su|
|00001e70| 6d 6d 61 72 79 2d 61 6e | 64 2d 6d 6f 64 65 2d 6c |mmary-an|d-mode-l|
|00001e80| 69 6e 65 20 6d 65 73 73 | 61 67 65 20 22 4d 65 73 |ine mess|age "Mes|
|00001e90| 73 61 67 65 25 73 20 77 | 72 69 74 74 65 6e 20 74 |sage%s w|ritten t|
|00001ea0| 6f 20 62 75 66 66 65 72 | 20 25 73 22 20 22 73 22 |o buffer| %s" "s"|
|00001eb0| 20 22 22 20 22 4d 65 73 | 73 61 67 65 25 73 20 77 | "" "Mes|sage%s w|
|00001ec0| 72 69 74 74 65 6e 20 74 | 6f 20 25 73 22 20 76 6d |ritten t|o %s" vm|
|00001ed0| 2d 6c 61 73 74 2d 77 72 | 69 74 74 65 6e 2d 66 69 |-last-wr|itten-fi|
|00001ee0| 6c 65 5d 20 37 20 22 5c | 0a 53 61 76 65 20 74 68 |le] 7 "\|.Save th|
|00001ef0| 65 20 63 75 72 72 65 6e | 74 20 6d 65 73 73 61 67 |e curren|t messag|
|00001f00| 65 20 74 6f 20 61 20 66 | 69 6c 65 2c 20 77 69 74 |e to a f|ile, wit|
|00001f10| 68 6f 75 74 20 69 74 73 | 20 68 65 61 64 65 72 20 |hout its| header |
|00001f20| 73 65 63 74 69 6f 6e 2e | 0a 49 66 20 74 68 65 20 |section.|.If the |
|00001f30| 66 69 6c 65 20 61 6c 72 | 65 61 64 79 20 65 78 69 |file alr|eady exi|
|00001f40| 73 74 73 2c 20 74 68 65 | 20 6d 65 73 73 61 67 65 |sts, the| message|
|00001f50| 20 77 69 6c 6c 20 62 65 | 20 61 70 70 65 6e 64 65 | will be| appende|
|00001f60| 64 20 74 6f 20 69 74 2e | 0a 50 72 65 66 69 78 20 |d to it.|.Prefix |
|00001f70| 61 72 67 20 43 4f 55 4e | 54 20 6d 65 61 6e 73 20 |arg COUN|T means |
|00001f80| 73 61 76 65 20 74 68 65 | 20 6e 65 78 74 20 43 4f |save the| next CO|
|00001f90| 55 4e 54 20 6d 65 73 73 | 61 67 65 73 2e 20 20 41 |UNT mess|ages.  A|
|00001fa0| 20 6e 65 67 61 74 69 76 | 65 20 43 4f 55 4e 54 20 | negativ|e COUNT |
|00001fb0| 6d 65 61 6e 73 0a 73 61 | 76 65 20 74 68 65 20 70 |means.sa|ve the p|
|00001fc0| 72 65 76 69 6f 75 73 20 | 43 4f 55 4e 54 2e 0a 0a |revious |COUNT...|
|00001fd0| 57 68 65 6e 20 69 6e 76 | 6f 6b 65 64 20 6f 6e 20 |When inv|oked on |
|00001fe0| 6d 61 72 6b 65 64 20 6d | 65 73 73 61 67 65 73 20 |marked m|essages |
|00001ff0| 28 76 69 61 20 76 6d 2d | 6e 65 78 74 2d 63 6f 6d |(via vm-|next-com|
|00002000| 6d 61 6e 64 2d 75 73 65 | 73 2d 6d 61 72 6b 73 29 |mand-use|s-marks)|
|00002010| 2c 0a 61 6c 6c 20 6d 61 | 72 6b 65 64 20 6d 65 73 |,.all ma|rked mes|
|00002020| 73 61 67 65 73 20 69 6e | 20 74 68 65 20 63 75 72 |sages in| the cur|
|00002030| 72 65 6e 74 20 66 6f 6c | 64 65 72 20 61 72 65 20 |rent fol|der are |
|00002040| 73 61 76 65 64 3b 20 6f | 74 68 65 72 20 6d 65 73 |saved; o|ther mes|
|00002050| 73 61 67 65 73 20 61 72 | 65 0a 69 67 6e 6f 72 65 |sages ar|e.ignore|
|00002060| 64 2e 0a 0a 54 68 65 20 | 73 61 76 65 64 20 6d 65 |d...The |saved me|
|00002070| 73 73 61 67 65 73 20 61 | 72 65 20 66 6c 61 67 67 |ssages a|re flagg|
|00002080| 65 64 20 61 73 20 60 77 | 72 69 74 74 65 6e 27 2e |ed as `w|ritten'.|
|00002090| 0a 0a 54 68 69 73 20 63 | 6f 6d 6d 61 6e 64 20 73 |..This c|ommand s|
|000020a0| 68 6f 75 6c 64 20 4e 4f | 54 20 62 65 20 75 73 65 |hould NO|T be use|
|000020b0| 64 20 74 6f 20 73 61 76 | 65 20 6d 65 73 73 61 67 |d to sav|e messag|
|000020c0| 65 20 74 6f 20 6d 61 69 | 6c 20 66 6f 6c 64 65 72 |e to mai|l folder|
|000020d0| 73 3b 20 75 73 65 0a 76 | 6d 2d 73 61 76 65 2d 6d |s; use.v|m-save-m|
|000020e0| 65 73 73 61 67 65 20 69 | 6e 73 74 65 61 64 20 28 |essage i|nstead (|
|000020f0| 6e 6f 72 6d 61 6c 6c 79 | 20 62 6f 75 6e 64 20 74 |normally| bound t|
|00002100| 6f 20 60 73 27 29 2e 22 | 20 28 62 79 74 65 2d 63 |o `s')."| (byte-c|
|00002110| 6f 64 65 20 22 08 09 19 | 18 c2 20 88 0b ab 8d c4 |ode "...|.. .....|
|00002120| 0b 21 ac 85 c5 c6 21 ab | 83 0b 71 88 c7 0e 08 ab |.!....!.|..q.....|
|00002130| 87 c9 ca 0e 08 5c 22 aa | 81 cb cc 0e 08 cc 24 cd |.....\".|......$.|
|00002140| 0e 0e 21 2a 44 87 22 20 | 5b 6c 61 73 74 2d 63 6f |..!*D." |[last-co|
|00002150| 6d 6d 61 6e 64 20 74 68 | 69 73 2d 63 6f 6d 6d 61 |mmand th|is-comma|
|00002160| 6e 64 20 76 6d 2d 66 6f | 6c 6c 6f 77 2d 73 75 6d |nd vm-fo|llow-sum|
|00002170| 6d 61 72 79 2d 63 75 72 | 73 6f 72 20 76 6d 2d 6d |mary-cur|sor vm-m|
|00002180| 61 69 6c 2d 62 75 66 66 | 65 72 20 62 75 66 66 65 |ail-buff|er buffe|
|00002190| 72 2d 6e 61 6d 65 20 65 | 72 72 6f 72 20 22 46 6f |r-name e|rror "Fo|
|000021a0| 6c 64 65 72 20 62 75 66 | 66 65 72 20 68 61 73 20 |lder buf|fer has |
|000021b0| 62 65 65 6e 20 6b 69 6c | 6c 65 64 2e 22 20 76 6d |been kil|led." vm|
|000021c0| 2d 72 65 61 64 2d 66 69 | 6c 65 2d 6e 61 6d 65 20 |-read-fi|le-name |
|000021d0| 76 6d 2d 6c 61 73 74 2d | 77 72 69 74 74 65 6e 2d |vm-last-|written-|
|000021e0| 66 69 6c 65 20 66 6f 72 | 6d 61 74 20 22 57 72 69 |file for|mat "Wri|
|000021f0| 74 65 20 74 65 78 74 20 | 74 6f 20 66 69 6c 65 3a |te text |to file:|
|00002200| 20 28 64 65 66 61 75 6c | 74 20 25 73 29 20 22 20 | (defaul|t %s) " |
|00002210| 22 57 72 69 74 65 20 74 | 65 78 74 20 74 6f 20 66 |"Write t|ext to f|
|00002220| 69 6c 65 3a 20 22 20 6e | 69 6c 20 70 72 65 66 69 |ile: " n|il prefi|
|00002230| 78 2d 6e 75 6d 65 72 69 | 63 2d 76 61 6c 75 65 20 |x-numeri|c-value |
|00002240| 63 75 72 72 65 6e 74 2d | 70 72 65 66 69 78 2d 61 |current-|prefix-a|
|00002250| 72 67 5d 20 35 29 5d 29 | 0a 28 66 73 65 74 20 27 |rg] 5)])|.(fset '|
|00002260| 76 6d 2d 70 69 70 65 2d | 6d 65 73 73 61 67 65 2d |vm-pipe-|message-|
|00002270| 74 6f 2d 63 6f 6d 6d 61 | 6e 64 20 23 5b 28 63 6f |to-comma|nd #[(co|
|00002280| 6d 6d 61 6e 64 20 70 72 | 65 66 69 78 2d 61 72 67 |mmand pr|efix-arg|
|00002290| 29 20 22 08 ab 8d c1 08 | 21 ac 85 c2 c3 21 ab 83 |) ".....|!....!..|
|000022a0| 08 71 88 c4 20 88 c5 20 | 88 0e 06 16 07 c8 c9 21 |.q.. .. |.......!|
|000022b0| ca 0e 0b ad 84 0e 0c cd | 3d 0e 0e cf 3d ab 85 d0 |........|=...=...|
|000022c0| d1 21 aa 84 0e 12 40 43 | 1e 13 1e 0b 1e 14 89 1e |.!....@C|........|
|000022d0| 15 71 88 d6 20 88 0e 13 | 83 db 00 0e 13 40 d7 48 |.q.. ...|.....@.H|
|000022e0| d8 48 4a 89 16 14 d7 48 | d9 48 71 88 8c 7e 88 0e |.HJ....H|.Hq..~..|
|000022f0| 14 d1 48 d7 48 62 88 0e | 1a ca 9a ab 8b 60 0e 14 |..H.Hb..|.....`..|
|00002300| d1 48 db 48 7d 88 aa c0 | 0e 1a dc 9a ab 8e dd 0e |.H.H}...|........|
|00002310| 14 21 0e 14 d1 48 db 48 | 7d 88 aa ac 0e 1a de 9a |.!...H.H|}.......|
|00002320| ab 89 60 dd 0e 14 21 7d | 88 aa 9d 0e 1a df 9a ab |..`...!}|........|
|00002330| 8e e0 0e 14 21 0e 14 d1 | 48 db 48 7d 88 aa 89 60 |....!...|H.H}...`|
|00002340| 0e 14 d1 48 db 48 7d 88 | 0e 0b ad 84 0e 0c cd 3d |...H.H}.|.......=|
|00002350| 1e 0b e1 65 64 0e 5c 22 | ae 81 e3 ca 0e 15 ca e4 |...ed.\"|........|
|00002360| 0e 06 26 08 88 2a 0e 13 | 41 89 16 13 84 48 00 0e |..&..*..|A....H..|
|00002370| 15 71 88 e5 20 d1 55 ac | 89 e6 0e 15 cd e7 e8 24 |.q.. .U.|.......$|
|00002380| aa 86 e6 ca 89 e9 ea 24 | 2c 87 22 20 5b 76 6d 2d |.......$|,." [vm-|
|00002390| 6d 61 69 6c 2d 62 75 66 | 66 65 72 20 62 75 66 66 |mail-buf|fer buff|
|000023a0| 65 72 2d 6e 61 6d 65 20 | 65 72 72 6f 72 20 22 46 |er-name |error "F|
|000023b0| 6f 6c 64 65 72 20 62 75 | 66 66 65 72 20 68 61 73 |older bu|ffer has|
|000023c0| 20 62 65 65 6e 20 6b 69 | 6c 6c 65 64 2e 22 20 76 | been ki|lled." v|
|000023d0| 6d 2d 63 68 65 63 6b 2d | 66 6f 72 2d 6b 69 6c 6c |m-check-|for-kill|
|000023e0| 65 64 2d 73 75 6d 6d 61 | 72 79 20 76 6d 2d 65 72 |ed-summa|ry vm-er|
|000023f0| 72 6f 72 2d 69 66 2d 66 | 6f 6c 64 65 72 2d 65 6d |ror-if-f|older-em|
|00002400| 70 74 79 20 63 6f 6d 6d | 61 6e 64 20 76 6d 2d 6c |pty comm|and vm-l|
|00002410| 61 73 74 2d 70 69 70 65 | 2d 63 6f 6d 6d 61 6e 64 |ast-pipe|-command|
|00002420| 20 67 65 74 2d 62 75 66 | 66 65 72 2d 63 72 65 61 | get-buf|fer-crea|
|00002430| 74 65 20 22 2a 53 68 65 | 6c 6c 20 43 6f 6d 6d 61 |te "*She|ll Comma|
|00002440| 6e 64 20 4f 75 74 70 75 | 74 2a 22 20 6e 69 6c 20 |nd Outpu|t*" nil |
|00002450| 70 6f 70 2d 75 70 2d 77 | 69 6e 64 6f 77 73 20 76 |pop-up-w|indows v|
|00002460| 6d 2d 6d 75 74 61 62 6c | 65 2d 77 69 6e 64 6f 77 |m-mutabl|e-window|
|00002470| 73 20 74 20 6c 61 73 74 | 2d 63 6f 6d 6d 61 6e 64 |s t last|-command|
|00002480| 20 76 6d 2d 6e 65 78 74 | 2d 63 6f 6d 6d 61 6e 64 | vm-next|-command|
|00002490| 2d 75 73 65 73 2d 6d 61 | 72 6b 73 20 76 6d 2d 73 |-uses-ma|rks vm-s|
|000024a0| 65 6c 65 63 74 2d 6d 61 | 72 6b 65 64 2d 6f 72 2d |elect-ma|rked-or-|
|000024b0| 70 72 65 66 69 78 65 64 | 2d 6d 65 73 73 61 67 65 |prefixed|-message|
|000024c0| 73 20 30 20 76 6d 2d 6d | 65 73 73 61 67 65 2d 70 |s 0 vm-m|essage-p|
|000024d0| 6f 69 6e 74 65 72 20 6d | 6c 69 73 74 20 6d 20 62 |ointer m|list m b|
|000024e0| 75 66 66 65 72 20 65 72 | 61 73 65 2d 62 75 66 66 |uffer er|ase-buff|
|000024f0| 65 72 20 31 20 35 20 39 | 20 70 72 65 66 69 78 2d |er 1 5 9| prefix-|
|00002500| 61 72 67 20 34 20 28 34 | 29 20 76 6d 2d 74 65 78 |arg 4 (4|) vm-tex|
|00002510| 74 2d 6f 66 20 28 31 36 | 29 20 28 36 34 29 20 76 |t-of (16|) (64) v|
|00002520| 6d 2d 76 68 65 61 64 65 | 72 73 2d 6f 66 20 63 61 |m-vheade|rs-of ca|
|00002530| 6c 6c 2d 70 72 6f 63 65 | 73 73 2d 72 65 67 69 6f |ll-proce|ss-regio|
|00002540| 6e 20 73 68 65 6c 6c 2d | 66 69 6c 65 2d 6e 61 6d |n shell-|file-nam|
|00002550| 65 20 22 73 68 22 20 22 | 2d 63 22 20 62 75 66 66 |e "sh" "|-c" buff|
|00002560| 65 72 2d 73 69 7a 65 20 | 76 6d 2d 64 69 73 70 6c |er-size |vm-displ|
|00002570| 61 79 20 28 76 6d 2d 70 | 69 70 65 2d 6d 65 73 73 |ay (vm-p|ipe-mess|
|00002580| 61 67 65 2d 74 6f 2d 63 | 6f 6d 6d 61 6e 64 29 20 |age-to-c|ommand) |
|00002590| 28 76 6d 2d 70 69 70 65 | 2d 6d 65 73 73 61 67 65 |(vm-pipe|-message|
|000025a0| 2d 74 6f 2d 63 6f 6d 6d | 61 6e 64 29 20 28 76 6d |-to-comm|and) (vm|
|000025b0| 2d 70 69 70 65 2d 6d 65 | 73 73 61 67 65 2d 74 6f |-pipe-me|ssage-to|
|000025c0| 2d 63 6f 6d 6d 61 6e 64 | 29 20 28 76 6d 2d 70 69 |-command|) (vm-pi|
|000025d0| 70 65 2d 6d 65 73 73 61 | 67 65 2d 74 6f 2d 63 6f |pe-messa|ge-to-co|
|000025e0| 6d 6d 61 6e 64 29 5d 20 | 31 30 20 22 5c 0a 52 75 |mmand)] |10 "\.Ru|
|000025f0| 6e 20 73 68 65 6c 6c 20 | 63 6f 6d 6d 61 6e 64 20 |n shell |command |
|00002600| 77 69 74 68 20 74 68 65 | 20 73 6f 6d 65 20 6f 72 |with the| some or|
|00002610| 20 61 6c 6c 20 6f 66 20 | 74 68 65 20 63 75 72 72 | all of |the curr|
|00002620| 65 6e 74 20 6d 65 73 73 | 61 67 65 20 61 73 20 69 |ent mess|age as i|
|00002630| 6e 70 75 74 2e 0a 42 79 | 20 64 65 66 61 75 6c 74 |nput..By| default|
|00002640| 20 74 68 65 20 65 6e 74 | 69 72 65 20 6d 65 73 73 | the ent|ire mess|
|00002650| 61 67 65 20 69 73 20 75 | 73 65 64 2e 0a 57 69 74 |age is u|sed..Wit|
|00002660| 68 20 6f 6e 65 20 5c 5c | 5b 75 6e 69 76 65 72 73 |h one \\|[univers|
|00002670| 61 6c 2d 61 72 67 75 6d | 65 6e 74 5d 20 74 68 65 |al-argum|ent] the|
|00002680| 20 74 65 78 74 20 70 6f | 72 74 69 6f 6e 20 6f 66 | text po|rtion of|
|00002690| 20 74 68 65 20 6d 65 73 | 73 61 67 65 20 69 73 20 | the mes|sage is |
|000026a0| 75 73 65 64 2e 0a 57 69 | 74 68 20 74 77 6f 20 5c |used..Wi|th two \|
|000026b0| 5c 5b 75 6e 69 76 65 72 | 73 61 6c 2d 61 72 67 75 |\[univer|sal-argu|
|000026c0| 6d 65 6e 74 5d 27 73 20 | 74 68 65 20 68 65 61 64 |ment]'s |the head|
|000026d0| 65 72 20 70 6f 72 74 69 | 6f 6e 20 6f 66 20 74 68 |er porti|on of th|
|000026e0| 65 20 6d 65 73 73 61 67 | 65 20 69 73 20 75 73 65 |e messag|e is use|
|000026f0| 64 2e 0a 57 69 74 68 20 | 74 68 72 65 65 20 5c 5c |d..With |three \\|
|00002700| 5b 75 6e 69 76 65 72 73 | 61 6c 2d 61 72 67 75 6d |[univers|al-argum|
|00002710| 65 6e 74 5d 27 73 20 74 | 68 65 20 76 69 73 69 62 |ent]'s t|he visib|
|00002720| 6c 65 20 68 65 61 64 65 | 72 20 70 6f 72 74 69 6f |le heade|r portio|
|00002730| 6e 20 6f 66 20 74 68 65 | 20 6d 65 73 73 61 67 65 |n of the| message|
|00002740| 0a 20 20 70 6c 75 73 20 | 74 68 65 20 74 65 78 74 |.  plus |the text|
|00002750| 20 70 6f 72 74 69 6f 6e | 20 69 73 20 75 73 65 64 | portion| is used|
|00002760| 2e 0a 0a 57 68 65 6e 20 | 69 6e 76 6f 6b 65 64 20 |...When |invoked |
|00002770| 6f 6e 20 6d 61 72 6b 65 | 64 20 6d 65 73 73 61 67 |on marke|d messag|
|00002780| 65 73 20 28 76 69 61 20 | 76 6d 2d 6e 65 78 74 2d |es (via |vm-next-|
|00002790| 63 6f 6d 6d 61 6e 64 2d | 75 73 65 73 2d 6d 61 72 |command-|uses-mar|
|000027a0| 6b 73 29 2c 0a 65 61 63 | 68 20 6d 61 72 6b 65 64 |ks),.eac|h marked|
|000027b0| 20 6d 65 73 73 61 67 65 | 20 69 73 20 73 75 63 63 | message| is succ|
|000027c0| 65 73 73 69 76 65 6c 79 | 20 70 69 70 65 64 20 74 |essively| piped t|
|000027d0| 6f 20 74 68 65 20 73 68 | 65 6c 6c 20 63 6f 6d 6d |o the sh|ell comm|
|000027e0| 61 6e 64 2c 0a 6f 6e 65 | 20 6d 65 73 73 61 67 65 |and,.one| message|
|000027f0| 20 70 65 72 20 63 6f 6d | 6d 61 6e 64 20 69 6e 76 | per com|mand inv|
|00002800| 6f 63 61 74 69 6f 6e 2e | 0a 0a 4f 75 74 70 75 74 |ocation.|..Output|
|00002810| 2c 20 69 66 20 61 6e 79 | 2c 20 69 73 20 64 69 73 |, if any|, is dis|
|00002820| 70 6c 61 79 65 64 2e 20 | 20 54 68 65 20 6d 65 73 |played. | The mes|
|00002830| 73 61 67 65 20 69 73 20 | 6e 6f 74 20 61 6c 74 65 |sage is |not alte|
|00002840| 72 65 64 2e 22 20 28 62 | 79 74 65 2d 63 6f 64 65 |red." (b|yte-code|
|00002850| 20 22 08 09 19 18 c2 20 | 88 0b ab 8d c4 0b 21 ac | "..... |......!.|
|00002860| 85 c5 c6 21 ab 83 0b 71 | 88 c7 c8 0e 09 5c 22 0e |...!...q|.....\".|
|00002870| 5c 6e 2a 44 87 22 20 5b | 6c 61 73 74 2d 63 6f 6d |\n*D." [|last-com|
|00002880| 6d 61 6e 64 20 74 68 69 | 73 2d 63 6f 6d 6d 61 6e |mand thi|s-comman|
|00002890| 64 20 76 6d 2d 66 6f 6c | 6c 6f 77 2d 73 75 6d 6d |d vm-fol|low-summ|
|000028a0| 61 72 79 2d 63 75 72 73 | 6f 72 20 76 6d 2d 6d 61 |ary-curs|or vm-ma|
|000028b0| 69 6c 2d 62 75 66 66 65 | 72 20 62 75 66 66 65 72 |il-buffe|r buffer|
|000028c0| 2d 6e 61 6d 65 20 65 72 | 72 6f 72 20 22 46 6f 6c |-name er|ror "Fol|
|000028d0| 64 65 72 20 62 75 66 66 | 65 72 20 68 61 73 20 62 |der buff|er has b|
|000028e0| 65 65 6e 20 6b 69 6c 6c | 65 64 2e 22 20 72 65 61 |een kill|ed." rea|
|000028f0| 64 2d 73 74 72 69 6e 67 | 20 22 50 69 70 65 20 74 |d-string| "Pipe t|
|00002900| 6f 20 63 6f 6d 6d 61 6e | 64 3a 20 22 20 76 6d 2d |o comman|d: " vm-|
|00002910| 6c 61 73 74 2d 70 69 70 | 65 2d 63 6f 6d 6d 61 6e |last-pip|e-comman|
|00002920| 64 20 63 75 72 72 65 6e | 74 2d 70 72 65 66 69 78 |d curren|t-prefix|
|00002930| 2d 61 72 67 5d 20 33 29 | 5d 29 0a 28 66 73 65 74 |-arg] 3)|]).(fset|
|00002940| 20 27 76 6d 2d 70 72 69 | 6e 74 2d 6d 65 73 73 61 | 'vm-pri|nt-messa|
|00002950| 67 65 20 23 5b 6e 69 6c | 20 22 c0 c1 c2 0b 43 0c |ge #[nil| "....C.|
|00002960| a4 c5 23 c6 5c 22 87 22 | 20 5b 76 6d 2d 70 69 70 |..#.\"."| [vm-pip|
|00002970| 65 2d 6d 65 73 73 61 67 | 65 2d 74 6f 2d 63 6f 6d |e-messag|e-to-com|
|00002980| 6d 61 6e 64 20 6d 61 70 | 63 6f 6e 63 61 74 20 69 |mand map|concat i|
|00002990| 64 65 6e 74 69 74 79 20 | 76 6d 2d 70 72 69 6e 74 |dentity |vm-print|
|000029a0| 2d 63 6f 6d 6d 61 6e 64 | 20 76 6d 2d 70 72 69 6e |-command| vm-prin|
|000029b0| 74 2d 63 6f 6d 6d 61 6e | 64 2d 73 77 69 74 63 68 |t-comman|d-switch|
|000029c0| 65 73 20 22 20 22 20 28 | 36 34 29 5d 20 35 20 22 |es " " (|64)] 5 "|
|000029d0| 5c 0a 50 72 69 6e 74 20 | 74 68 65 20 63 75 72 72 |\.Print |the curr|
|000029e0| 65 6e 74 20 6d 65 73 73 | 61 67 65 2e 22 20 6e 69 |ent mess|age." ni|
|000029f0| 6c 5d 29 0a             |                         |l]).    |        |
+--------+-------------------------+-------------------------+--------+--------+